Top 10k strings from Forest, The (1983)(Phipps Associates).z80 in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [Z80] /

Back to the directory listing

   1 {voiea]ZVRNJGECCCBCEGIJIIGEB>:64467:;>??AAABBCEFIMPRUXZ]_````]\ZUPKGC?<:742/,+)('$#! 
   1 y0=y0+h*sb:
   1 xobsfe=63463
   1 xlyh=63444
   1 xlxh=63441
   1 xlhh=63447
   1 xlhg=63450
   1 xlen=61602
   1 xhyt=63439
   1 xhyh=63445
   1 xhxt=63436
   1 xhxh=63442
   1 xhhh=63448
   1 xhhg=63451
   1 xfinfl=63456
   1 xfhh=63446
   1 xfhg=63449
   1 xcode=63464
   1 xbear=63431
   1 xbear,b*d2b:
   1 xattr0=63850
   1 x0=x0-h*cb:
   1 uturn=62052
   1 uterra=62580
   1 uright=61700
   1 upbar=61603
   1 umove=61850
   1 uleft=61720
   1 uinit=63298
   1 uhigh=62040
   1 udispl=62055
   1 ucls=63852
   1 uback=61740
   1 u()=(65536
   1 time=time-hour*3600
   1 m$="Width, w metres ?":
   1 m$="Step size? [1..8m] ":
   1 m$="Scale ? [n, as in 1:n,000]":
   1 m$="PUNCH: control number? ":
   1 m$="How many controls? [1.."+
   1 m$="Height, h metres ?":
   1 m$="Corner of plot: y0 ?":
   1 m$="Corner of plot: x0 ?":
   1 m$="Control no.? [1.."+
   1 m$="Contour interval? [1.25..80m]":
   1 m$="Angle b degrees ?":
   1 lastht=ht:
   1 dyl=w*cb/nx:
   1 dyc=h*sb/ny:
   1 dxl=w*sb/nx:
   1 dxc=-h*cb/ny:
   1 cheat=cheat+1
   1 cheat;" TIMES!"
   1 c$(i),d$(i):
   1 a$(i)="  "
   1 Water tank
   1 Sheep fold
   1 Root stock
   1 Rock outcrop
   1 Mine shaft
   1 MPTX\`ehlpsvx{~
   1 Depression
   1 ;c$(i);"  ";d$(i):
   1 ;"y0 = ";y0;:
   1 ;"y scale = 1:";
   1 ;"x0,y0";:
   1 ;"x0 = ";x0;
   1 ;"x scale = 1:";
   1 ;"w = ";w;" m.";:
   1 ;"h = ";h;" m.";:
   1 ;"b  = ";b;" degrees";
   1 ;"THE FOREST";
   1 ;"KEEP THE TAPE RUNNING":
   1 ;"In the lake!";
   1 ;"FINISH":
   1 ;"ELAPSED TIME: ";hour;" ";mins;" ";secs;" ":
   1 ;"By Graham T. Relf";
   1 ;"BEARING: ";bear;" degrees  ";
   1 ;"Any key";:
   1 ;"A simulation of orienteering";
   1 ;"    STOP THE TAPE    ":
   1 1983 Phipps Associates
   1 +(ht-lastht))*e(
   1 );" y = ";
   1 (y0/ss)-s2
   1 (x0/ss)-s2:
   1 (time/3600
   1 (time-mins*60
   1 ( Press any key to start
   1 #~THE FOREST
   1 #')-2:?EIMPRTTUUTTRQPKIGGIJK
   1 "YOU CHEATED ";:
   1 "Wrong number ";i
   1 "Specify w & h or scale? [W,S]";
   1 "Saving course on tape (3 files)"
   1 "SETTING NEW COURSE"
   1 "New bearing:";
   1 "Navigate to finish (no tapes)"
   1 "Missing number ";i:
   1 "Load course from tape (3 files)"
   1 "Fine or coarse map? ";
   1 "Course A    5.5km.":
   1 "Control card":
   1 "Control ";(i);": description?";
   1 "Control ";(i);": code? ";
   1 "Change any? [y/n] ";
   1 "BP","KNOLL","BO","MINE SHAFT","AO","MINE SHAFT"
   1 "BN","DEPRESSION","BO","ROCK OUTCROP","BP","DEPRESSION"
   1 "BM","POND","BL","KNOLL","BN","MINE SHAFT"
   1 "BD","NICHE","BN","ROCK OUTCROP","BA","NICHE"
   1 "%(+.1369<?ADGILNQSUXZ\^`bdfhjkmopqstuvxyzz{|}}~~~
   1 " to this menu."
   1 " reported at the finish."
   1 " real orienteering, so they are":
   1 " counted as cheating and will be":
   1 " You are standing at"
   1 " THE FOREST : MAIN MENU":
   1 " NB: 1 to 6 are not possible in":
   1 " COURSE PLANNER'S MENU":
   1 " After an option any key returns":
   1 " 9) Alter the set course"
   1 " 8) Go to more complex forest"
   1 " 8) Back to normal forest"
   1 " 7) Give up (stop)"
   1 " 6) Draw 3D view"
   1 " 5) Draw cross-section"
   1 " 4) Scan for point features"
   1 " 3) Map contours"
   1 " 3) Load course from tape"
   1 " 2) Save course on tape"
   1 " 2) Map terrain types"
   1 " 1) Set new course"
   1 " 1) Get coordinates"
   1 " 0) Return to scene (no penalty)"
   1 " 0) Return to main menu"
   1 !$%''((('''%%%$$$##!! 
   1  The Forest
   1  1983 Phipps Associates"
   1  1983 Phipps Associates
   1    By Graham T. Relf